home *** CD-ROM | disk | FTP | other *** search
/ Clinical Endocrinology / Clinical Endocrinology.iso / mac / Endocrinology Folder / Data / Init.dir / 00002_Script_2 < prev    next >
Text File  |  1995-11-09  |  389b  |  16 lines
  1. -- Handler to determine which platform the CD is running on
  2. -- and specifying which separator, i.e. ":" or "/" to use.
  3. -- The correct separator is stored as a global, "gSep" - short
  4. -- for global separator.
  5.  
  6. on whereAmI
  7.   global gSep
  8.   
  9.   if the machineType <> 256 then
  10.     set gSep = ":"
  11.     blackOut -- use backdrop XObj
  12.   else
  13.     set gSep = "\"
  14.   end if
  15.   
  16. end whereAmI